/* do check of density and pressure, and iblanks here */
if (qptr->check == P3D_CHECK && (whichdataset == pressure ||
whichdataset == density))
{
if (dval < 0.0)
{
fprintf(stderr, "Negative %s value %f found in Q file %s and is converted to %f\n", whichdataset == pressure ? "pressure" : "density", dval, qptr->name, 0.0);
/* do check of negative values of density or pressure
if required */
if (whichcomponent < 2 && qptr->check == P3D_CHECK &&
rval < (real) 0.0)
{
fprintf(stderr, "Negative %s value %f found in Q file %s and is converted to %f\n", whichdataset == pressure ? "pressure" : "density", rval, qptr->name, 0.0);
/* do check of density and pressure, and iblanks here */
if (qptr->check == P3D_CHECK && (whichdataset == pressure ||
whichdataset == density))
{
if (fval < 0.0)
{
fprintf(stderr, "Negative %s value %f found in Q file %s and is converted to %f\n", whichdataset == pressure ? "pressure" : "density", fval, qptr->name, 0.0);